home *** CD-ROM | disk | FTP | other *** search
/ Softwarová Záchrana 3 / Softwarova-zachrana-3.bin / Xteq X-Setup / xqdcXSP-Setup-EN.exe / {app} / plugins / XQ MSDOSSYS 1.xpl < prev    next >
Text File  |  2001-05-04  |  4KB  |  111 lines
  1. "FILE"="Xteq Systems X-Setup Plugin 6.0"
  2. "TYPE"="6"
  3. "COUNT"="5"
  4. "UIPATH 1"="Startup/Shutdown\Startup\Windows 9x/ME\10) Boot Menu"
  5. "NAME"="General Options"
  6. "VERSION"="1.65"
  7. "OSVERSION"="10101"
  8. "LANGUAGE"="VBScript"
  9. "TEXT 1"="Start Windows interface (GUI) automatically"
  10. "TEXT 2"="Display Windows Logo (C:\LOGO.SYS) while booting"
  11. "TEXT 3"="Enable F4, F5, F6, F8 and Shift keys while booting"
  12. "TEXT 4"="Display Windows 95/OSR2/98 Startup Menu options"
  13. "TEXT 5"="Display warning before using "Safe Mode" option"
  14. "DESCRIPTION 1"="Change these options to control the way Windows 95/OSR2/98/ME boots up."
  15. "DESCRIPTION 2"="NOTE: Microsoft REMOVED the display of the Startup Menu from Windows Millennium Edition (ME), but most of the boot options are still available via "hot key combos":"
  16. "DESCRIPTION 3"="- F4 = Previous version of MS-DOS (from 6.00 up to 6.22, or 3rd party DOS OS, if any)."
  17. "DESCRIPTION 4"="- F5 = Safe mode without Network/TCP/IP support, bypassing CONFIG.SYS and AUTOEXEC.BAT entirely (if any)."
  18. "DESCRIPTION 5"="- F6 = Safe mode with Network/TCP/IP support (ONLY if "Network=1" present under the MSDOS.SYS [Options] section), bypassing CONFIG.SYS entirely (if any)."
  19. "DESCRIPTION 6"="- F8 = Logged mode (BOOTLOG.TXT is created in the root directory of the boot drive, usually C:\)."
  20. "DESCRIPTION 7"="- Shift + F5 = Safe mode command prompt only (native/real/true MS-DOS mode with NO devices/drivers/TSRs loaded in memory). CONFIG.SYS and AUTOEXEC.BAT are bypassed (if any)."
  21. "DESCRIPTION 8"="- Shift + F8 = Step-by-step confirmation of ALL CONFIG.SYS and AUTOEXEC.BAT lines (if any)."
  22. "AUTHOR"="Xteq Systems"
  23. "CONTACTURL"="http://www.xteq.com/"
  24. "COPYRIGHT"="Copyright ⌐ Xteq Systems - All Rights Reserved"
  25. "COMMENT 1"="Thanks to AXCEL216 [http://members.aol.com/axcel216/] for all this stuff!"
  26. "COMMENT 2"="Thanks to Joseph B. Calderone [mailto:joe935@cablenet-va.com] for bug notices!"
  27.  
  28. 'Declaration of some constants
  29. sF="C:\MSDOS.SYS"
  30. sO="Options"
  31.  
  32. 'Called when the Plugin is started
  33. Sub Plugin_Initialize
  34.   Call FileSetAttribute(sf,"H-")
  35.   Call FileSetAttribute(sf,"R-")
  36.   Call FileSetAttribute(sf,"S-")
  37.  
  38.   i=IniReadValue(sf,so,"BootGUI")
  39.   if i=1 then SetUIElement 1,true
  40.  
  41.   i=IniReadValue(sf,so,"Logo")
  42.   if i=1 then SetUiElement 2,true
  43.   if IsEmpty(i) then SetUiElement 2,true 'if not present, Windows default is true
  44.  
  45.   i=IniReadValue(sf,so,"BootKeys")
  46.   if i=1 then SetUiElement 3,true
  47.   if IsEmpty(i) then SetUiElement 3,true 'if not present, Windows default is true
  48.  
  49.   i=IniReadValue(sf,so,"BootMenu")
  50.   if i=1 then SetUiElement 4,true
  51.  
  52.   i=IniReadValue(sf,so,"BootWarn")
  53.   if i=1 then SetUiElement 5,true
  54. End Sub
  55.  
  56. 'Called when the Plugin should validate the Data the user has entered
  57. Sub Plugin_CheckData(ElementIndex)
  58. End Sub
  59.  
  60. 'Called when the Plugin should apply the changes
  61. Sub Plugin_Apply(ElementIndex,ElementSubIndex)
  62.  
  63.  b=GetUIElement(1)
  64.  if b=true then
  65.   Call IniWriteValue(sf,so,"BootGUI",1)
  66.  else
  67.   Call IniWriteValue(sf,so,"BootGUI",0)
  68.  end if
  69.  
  70.  b=GetUIElement(2)
  71.  if b=true then
  72.   Call IniWriteValue(sf,so,"Logo",1)
  73.  else
  74.   Call IniWriteValue(sf,so,"Logo",0)
  75.  end if
  76.  
  77.  'if BootMenu = true, then BootKeys must be true also!
  78.  b=GetUIElement(4)
  79.  if b=true then
  80.     Call IniWriteValue(sf,so,"BootMenu",1)
  81.     Call SetUIElement(3,true)
  82.  else
  83.     Call IniWriteValue(sf,so,"BootMenu",0)
  84.  end if
  85.  
  86.  
  87.  b=GetUIElement(3)
  88.  if b=true then
  89.   Call IniWriteValue(sf,so,"BootKeys",1)
  90.  else
  91.   Call IniWriteValue(sf,so,"BootKeys",0)
  92.  end if
  93.  
  94.  
  95.  b=GetUIElement(5)
  96.  if b=true then
  97.   Call IniWriteValue(sf,so,"BootWarn",1)
  98.  else
  99.   Call IniWriteValue(sf,so,"BootWarn",0)
  100.  end if
  101.  
  102.  Restart
  103. End Sub
  104.  
  105. 'Called when the Plugin is about to be removed from memory
  106. Sub Plugin_Terminate
  107.  Call FileSetAttribute(sf,"H+")
  108.  Call FileSetAttribute(sf,"R+")
  109.  Call FileSetAttribute(sf,"S+")
  110. End Sub
  111.